﻿Public Class fichier_origin
    Public Id As Integer
    Public Num As String
    Public Num_decision As String
    Public autorie As String
    Public date_decision As Date
    Public mo9arir As String
    Public tribunal As String
    Public remarque As String

    'Les constructeur ---------------------------


    Sub New(ByVal Id As Integer, ByVal Num As String, ByVal Num_decision As String, ByVal autorie As String, ByVal date_decision As Date, ByVal mo9arir As String, ByVal tribunal As String, ByVal remarque As String)
        Me.Id = Id
        Me.Num = Num
        Me.Num_decision = Num_decision
        Me.autorie = autorie
        Me.date_decision = date_decision
        Me.mo9arir = mo9arir
        Me.tribunal = tribunal
        Me.remarque = remarque
    End Sub

    Sub New()

    End Sub


    'les listes ---------------------------------








    'les fonctions ---------------------------
End Class
